/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 01 New Uploads / P4UTIL.ZIP / REFLPWER.PRG

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 10 1e 10 01 00 8f 20 | 43 42 4d 2d 36 34 20 52 |....... |CBM-64 R|
|00000010| 45 46 4c 45 43 54 45 44 | 20 50 4f 57 45 52 00 2d |EFLECTED| POWER.-|
|00000020| 10 02 00 8f 20 42 59 20 | 57 31 49 43 50 00 45 10 |.... BY |W1ICP.E.|
|00000030| 03 00 8f 20 43 51 2c 20 | 46 45 42 52 55 41 52 59 |... CQ, |FEBRUARY|
|00000040| 20 31 39 38 33 00 5a 10 | 04 00 8f 20 43 42 4d 2d | 1983.Z.|... CBM-|
|00000050| 36 34 20 42 59 20 57 38 | 46 58 00 7a 10 05 00 8f |64 BY W8|FX.z....|
|00000060| 20 52 45 57 52 49 54 54 | 45 4e 20 46 52 4f 4d 20 | REWRITT|EN FROM |
|00000070| 39 2f 38 33 20 43 51 20 | 42 59 00 85 10 06 00 8f |9/83 CQ |BY......|
|00000080| 20 4b 4e 39 56 00 ac 10 | 07 00 8f 20 4d 4f 44 49 | KN9V...|... MODI|
|00000090| 46 49 45 44 20 42 59 20 | 4c 4f 55 49 53 20 4a 2e |FIED BY |LOUIS J.|
|000000a0| 20 4a 41 43 4f 42 53 2c | 20 4a 52 2e 00 c9 10 09 | JACOBS,| JR.....|
|000000b0| 00 97 35 33 32 38 30 2c | 30 3a 97 35 33 32 38 31 |..53280,|0:.53281|
|000000c0| 2c 30 3a 97 36 34 36 2c | 31 00 fb 10 0a 00 99 22 |,0:.646,|1......"|
|000000d0| 93 12 20 20 20 20 20 20 | 20 52 45 46 4c 45 43 54 |..      | REFLECT|
|000000e0| 45 44 20 50 4f 57 45 52 | 20 43 41 4c 43 55 4c 41 |ED POWER| CALCULA|
|000000f0| 54 4f 52 20 20 20 20 20 | 20 20 22 00 2b 11 14 00 |TOR     |  ".+...|
|00000100| 99 22 12 4f 52 49 47 49 | 4e 41 4c 20 42 59 20 57 |.".ORIGI|NAL BY W|
|00000110| 31 49 43 50 2c 20 4d 4f | 44 53 20 42 59 20 4b 4e |1ICP, MO|DS BY KN|
|00000120| 39 56 20 43 51 2d 4a 55 | 4c 38 34 00 4b 11 32 00 |9V CQ-JU|L84.K.2.|
|00000130| 99 22 11 20 12 53 92 43 | 52 45 45 4e 20 4f 52 20 |.". .S.C|REEN OR |
|00000140| 12 50 92 52 49 4e 54 45 | 52 22 3b 00 53 11 37 00 |.P.RINTE|R";.S.7.|
|00000150| 85 4f 24 00 64 11 3c 00 | 8b 4f 24 b2 22 53 22 a7 |.O$.d.<.|.O$."S".|
|00000160| 32 30 32 30 00 74 11 41 | 00 8b 4f 24 b2 22 50 22 |2020.t.A|..O$."P"|
|00000170| a7 31 37 30 00 8c 11 46 | 00 8b 30 24 b3 b1 22 53 |.170...F|..0$.."S|
|00000180| 22 af 4f 24 b3 b1 22 50 | 22 a7 31 30 00 be 11 aa |".O$.."P|".10....|
|00000190| 00 99 22 93 12 20 2a 2a | 2a 20 20 20 44 45 54 45 |..".. **|*   DETE|
|000001a0| 52 4d 49 4e 49 4e 47 20 | 52 45 46 4c 45 43 54 45 |RMINING |REFLECTE|
|000001b0| 44 20 50 4f 57 45 52 20 | 20 2a 2a 2a 20 92 00 e5 |D POWER | *** ...|
|000001c0| 11 f4 01 85 22 11 11 45 | 4e 54 45 52 20 46 4f 52 |...."..E|NTER FOR|
|000001d0| 57 41 52 44 20 50 4f 57 | 45 52 20 28 57 41 54 54 |WARD POW|ER (WATT|
|000001e0| 53 29 22 3b 46 00 03 12 | 58 02 85 22 11 45 4e 54 |S)";F...|X..".ENT|
|000001f0| 45 52 20 4d 41 58 49 4d | 55 4d 20 56 53 57 52 22 |ER MAXIM|UM VSWR"|
|00000200| 3b 56 4d 00 22 12 bc 02 | 85 22 11 45 4e 54 45 52 |;VM."...|.".ENTER|
|00000210| 20 56 53 57 52 20 53 54 | 45 50 20 53 49 5a 45 22 | VSWR ST|EP SIZE"|
|00000220| 3b 53 00 36 12 84 03 8f | 20 50 52 49 4e 54 20 52 |;S.6....| PRINT R|
|00000230| 4f 55 54 49 4e 45 00 42 | 12 8e 03 9f 34 2c 34 3a |OUTINE.B|....4,4:|
|00000240| 98 34 00 6c 12 c0 03 98 | 34 2c a6 31 38 29 22 3c |.4.l....|4,.18)"<|
|00000250| 46 4f 52 57 41 52 44 20 | 50 4f 57 45 52 20 49 53 |FORWARD |POWER IS|
|00000260| 22 3b 46 3b 22 57 41 54 | 54 53 3e 22 00 76 12 ca |";F;"WAT|TS>".v..|
|00000270| 03 98 34 3a 98 34 00 a0 | 12 d4 03 98 34 2c 22 20 |..4:.4..|....4," |
|00000280| 20 20 56 53 57 52 22 2c | a6 31 32 29 22 52 45 46 |  VSWR",|.12)"REF|
|00000290| 4c 45 43 54 45 44 20 50 | 57 52 20 28 57 29 22 3b |LECTED P|WR (W)";|
|000002a0| 00 bd 12 d6 03 98 34 2c | a6 39 29 22 54 52 55 45 |......4,|.9)"TRUE|
|000002b0| 20 52 41 44 20 50 57 52 | 20 28 57 29 22 00 c4 12 | RAD PWR| (W)"...|
|000002c0| d9 03 98 34 00 d6 12 e8 | 03 8f 20 43 41 4c 43 55 |...4....|.. CALCU|
|000002d0| 4c 41 54 49 4f 4e 00 e4 | 12 f2 03 81 56 b2 31 a4 |LATION..|....V.1.|
|000002e0| 56 4d a9 53 00 10 13 88 | 04 52 b2 46 ac 28 28 28 |VM.S....|.R.F.(((|
|000002f0| 56 ab 31 29 ad 28 56 aa | 31 29 29 ac 28 28 56 ab |V.1).(V.|1)).((V.|
|00000300| 31 29 ad 28 56 aa 31 29 | 29 29 3a 54 b2 46 ab 52 |1).(V.1)|)):T.F.R|
|00000310| 00 37 13 92 04 98 34 2c | c7 28 31 36 29 22 30 33 |.7....4,|.(16)"03|
|00000320| 22 56 3b c7 28 31 36 29 | 22 33 30 22 52 3b c7 28 |"V;.(16)|"30"R;.(|
|00000330| 36 29 22 35 36 22 54 00 | 3d 13 9c 04 82 00 44 13 |6)"56"T.|=.....D.|
|00000340| a6 04 a0 34 00 4f 13 b0 | 04 99 22 93 22 3a 80 00 |...4.O..|..".":..|
|00000350| 6d 13 bf 04 8f 20 50 52 | 49 4e 54 45 52 20 4c 49 |m.... PR|INTER LI|
|00000360| 53 54 49 4e 47 20 52 4f | 55 54 49 4e 45 00 7e 13 |STING RO|UTINE.~.|
|00000370| 14 05 a0 34 3a 9f 34 2c | 34 3a 9d 34 3a 9b 00 88 |...4:.4,|4:.4:...|
|00000380| 13 1e 05 98 34 3a a0 34 | 00 bb 13 e4 07 99 22 93 |....4:.4|......".|
|00000390| 12 20 2a 2a 2a 20 20 20 | 44 45 54 45 52 4d 49 4e |. ***   |DETERMIN|
|000003a0| 49 4e 47 20 52 45 46 4c | 45 43 54 45 44 20 50 4f |ING REFL|ECTED PO|
|000003b0| 57 45 52 20 20 2a 2a 2a | 20 92 22 00 c3 13 e9 07 |WER  ***| .".....|
|000003c0| 99 3a 99 00 e8 13 ee 07 | 85 22 45 4e 54 45 52 20 |.:......|."ENTER |
|000003d0| 46 4f 52 57 41 52 44 20 | 50 4f 57 45 52 20 28 57 |FORWARD |POWER (W|
|000003e0| 41 54 54 53 29 22 3b 46 | 00 06 14 f8 07 85 22 11 |ATTS)";F|......".|
|000003f0| 45 4e 54 45 52 20 4d 41 | 58 49 4d 55 4d 20 56 53 |ENTER MA|XIMUM VS|
|00000400| 57 52 22 3b 56 4d 00 25 | 14 02 08 85 22 11 45 4e |WR";VM.%|....".EN|
|00000410| 54 45 52 20 56 53 57 52 | 20 53 54 45 50 20 53 49 |TER VSWR| STEP SI|
|00000420| 5a 45 22 3b 53 00 49 14 | 0c 08 99 22 3c 46 4f 52 |ZE";S.I.|..."<FOR|
|00000430| 57 41 52 44 20 50 4f 57 | 45 52 20 49 53 22 3b 46 |WARD POW|ER IS";F|
|00000440| 3b 22 57 41 54 54 53 3e | 22 00 73 14 0e 08 99 22 |;"WATTS>|".s...."|
|00000450| 93 11 1d 46 4f 52 57 41 | 52 44 20 20 20 20 20 20 |...FORWA|RD      |
|00000460| 20 20 4d 41 58 49 4d 55 | 4d 20 20 20 20 20 20 53 |  MAXIMU|M      S|
|00000470| 54 45 50 00 84 14 10 08 | 99 22 20 50 4f 57 45 52 |TEP.....|." POWER|
|00000480| 20 3d 22 46 00 99 14 11 | 08 99 a3 31 36 29 22 91 | ="F....|...16)".|
|00000490| 56 53 57 52 20 3d 22 56 | 4d 00 ad 14 12 08 99 a3 |VSWR ="V|M.......|
|000004a0| 32 39 29 22 91 53 49 5a | 45 20 3d 22 53 00 d3 14 |29)".SIZ|E ="S...|
|000004b0| 16 08 99 22 11 12 20 56 | 53 57 52 20 92 20 20 20 |...".. V|SWR .   |
|000004c0| 12 20 52 45 46 4c 45 43 | 54 45 44 20 50 57 52 20 |. REFLEC|TED PWR |
|000004d0| 92 22 3b 00 ed 14 20 08 | 99 22 20 20 12 20 54 52 |.";... .|."  . TR|
|000004e0| 55 45 20 52 41 44 20 50 | 57 52 20 92 22 00 ff 14 |UE RAD P|WR ."...|
|000004f0| 25 08 8f 20 43 41 4c 43 | 55 4c 41 54 49 4f 4e 00 |%.. CALC|ULATION.|
|00000500| 0d 15 2a 08 81 56 b2 31 | a4 56 4d a9 53 00 39 15 |..*..V.1|.VM.S.9.|
|00000510| 2f 08 52 b2 46 ac 28 28 | 28 56 ab 31 29 ad 28 56 |/.R.F.((|(V.1).(V|
|00000520| aa 31 29 29 ac 28 28 56 | ab 31 29 ad 28 56 aa 31 |.1)).((V|.1).(V.1|
|00000530| 29 29 29 3a 54 b2 46 ab | 52 00 4f 15 b8 0b 99 a3 |))):T.F.|R.O.....|
|00000540| 31 29 56 3b a3 31 30 29 | 52 3b a3 32 37 29 54 00 |1)V;.10)|R;.27)T.|
|00000550| 55 15 bd 0b 82 00 7e 15 | c7 0b 99 22 11 20 20 20 |U.....~.|...".   |
|00000560| 20 20 20 20 20 41 4e 4f | 54 48 45 52 20 43 41 4c |     ANO|THER CAL|
|00000570| 43 55 4c 41 54 49 4f 4e | 20 28 59 2f 4e 29 00 92 |CULATION| (Y/N)..|
|00000580| 15 cc 0b a1 41 24 3a 8b | 41 24 b2 22 22 a7 33 30 |....A$:.|A$."".30|
|00000590| 32 30 00 a1 15 d1 0b 8b | 41 24 b2 22 59 22 a7 31 |20......|A$."Y".1|
|000005a0| 30 00 b5 15 d6 0b 8b 41 | 24 b3 b1 22 59 22 a7 99 |0......A|$.."Y"..|
|000005b0| 22 93 22 3a 80 00 00 00 |                         |".":....|        |
+--------+-------------------------+-------------------------+--------+--------+